﻿Imports Mystery
Imports MysteryControls

<ContentType(Label:="Way to Say Hello", list_label:="Greatings")>
<ContentButtonAddAttribute()>
<ContentTypeButtonAttribute()>
Public Class HelloContent
    Inherits BaseContent

    <ReferenceText(), ContentProperty(), ContentProperyViewAttr()>
    Public Property language As New ContentPropertyValue(Of String)

    <ContentProperty(Label:="greatings of this language"), ContentProperyViewAttr()>
    Public Property hiThere As New ContentPropertyValue(Of String)

    <SearchText()>
    Public ReadOnly Property search As String
        Get
            Return language.value & " " & hiThere.value
        End Get
    End Property

End Class
